From: Dan Nicolaescu <dann@ics.uci.edu>
Date: Mon, 7 Jan 2008 03:07:36 +0000 (+0000)
Subject: (vc-hg-dir-state): Pass the dir argument to
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~18855^2~837
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=45286831a5ad240a151ab4553d71ab6b3fdcd783;p=emacs.git

(vc-hg-dir-state): Pass the dir argument to
vc-hg-command.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index a67b82e6cd7..f98b68709fa 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2008-01-07  Dan Nicolaescu  <dann@ics.uci.edu>
+
+	* vc-hg.el (vc-hg-dir-state): Pass the dir argument to
+	vc-hg-command.
+
 2008-01-07  Glenn Morris  <rgm@gnu.org>
 
 	* calc/calc-help.el (calc-full-help): Use emacs-copyright.
diff --git a/lisp/vc-hg.el b/lisp/vc-hg.el
index c97a07220be..ac4f333f749 100644
--- a/lisp/vc-hg.el
+++ b/lisp/vc-hg.el
@@ -170,7 +170,7 @@
 
 (defun vc-hg-dir-state (dir)
   (with-temp-buffer
-    (vc-hg-command (current-buffer) nil nil "status")
+    (vc-hg-command (current-buffer) nil dir "status")
     (goto-char (point-min))
     (let ((status-char nil)
 	  (file nil))